H-Termination proof of /home/matraf/haskell/eval_FullyBlown

YES 23.71 H-Termination proof of /home/matraf/haskell/eval_FullyBlown_Fast/empty.hs
H-Termination of the given Haskell-Program with start terms could successfully be proven:

↳ HASKELL

  ↳ BR

mainModule Main

((toLower :: Char -> Char) :: Char -> Char)

module Main where

import qualified Prelude

Replaced joker patterns by fresh variables and removed binding patterns.

↳ HASKELL

  ↳ BR

    ↳ HASKELL

      ↳ COR

mainModule Main

((toLower :: Char -> Char) :: Char -> Char)

module Main where

import qualified Prelude

Cond Reductions:
The following Function with conditions

undefined

| False

= undefined

is transformed to

undefined = undefined1

undefined0 True = undefined

undefined1 = undefined0 False

The following Function with conditions

toLower c

| isUpper c

= toEnum (fromEnum c - fromEnum 'A' + fromEnum 'a')

| otherwise

= c

is transformed to

toLower c = toLower2 c

toLower0 c True = c

toLower1 c True = toEnum (fromEnum c - fromEnum 'A' + fromEnum 'a')

toLower1 c False = toLower0 c otherwise

toLower2 c = toLower1 c (isUpper c)

↳ HASKELL

  ↳ BR

    ↳ HASKELL

      ↳ COR

        ↳ HASKELL

          ↳ NumRed

mainModule Main

((toLower :: Char -> Char) :: Char -> Char)

module Main where

import qualified Prelude

Num Reduction: All numbers are transformed to thier corresponding representation with Pos, Neg, Succ and Zero.

↳ HASKELL

  ↳ BR

    ↳ HASKELL

      ↳ COR

        ↳ HASKELL

          ↳ NumRed

            ↳ HASKELL

              ↳ Narrow

mainModule Main

(toLower :: Char -> Char)

module Main where

import qualified Prelude

Haskell To QDPs

digraph dp_graph {
node [outthreshold=100, inthreshold=100];1[label="toLower",fontsize=16,color="grey",shape="box"];1 -> 3[label="",style="dashed", color="grey", weight=3];
3[label="toLower vx3",fontsize=16,color="black",shape="triangle"];3 -> 4[label="",style="solid", color="black", weight=3];
4[label="toLower2 vx3",fontsize=16,color="black",shape="box"];4 -> 5[label="",style="solid", color="black", weight=3];
5[label="toLower1 vx3 (isUpper vx3)",fontsize=16,color="black",shape="box"];5 -> 6[label="",style="solid", color="black", weight=3];
6 -> 50[label="",style="dashed", color="red", weight=0];
6[label="toLower1 vx3 (vx3 >= Char (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ Zero))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))) && vx3 <= Char (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ Zero)))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))) || vx3 >= Char (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ Zero)))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))) && vx3 <= Char (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ Zero)))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))) || vx3 >= Char (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ Zero)))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))) && vx3 <= Char (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ Zero)))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))",fontsize=16,color="magenta"];6 -> 51[label="",style="dashed", color="magenta", weight=3];
6 -> 52[label="",style="dashed", color="magenta", weight=3];
6 -> 53[label="",style="dashed", color="magenta", weight=3];
6 -> 54[label="",style="dashed", color="magenta", weight=3];
6 -> 55[label="",style="dashed", color="magenta", weight=3];
6 -> 56[label="",style="dashed", color="magenta", weight=3];
6 -> 57[label="",style="dashed", color="magenta", weight=3];
51[label="Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ Zero))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))",fontsize=16,color="green",shape="box"];52[label="Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ Zero))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))",fontsize=16,color="green",shape="box"];53[label="Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ Zero))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))",fontsize=16,color="green",shape="box"];54[label="Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ Zero)))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))",fontsize=16,color="green",shape="box"];55[label="Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ Zero))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))",fontsize=16,color="green",shape="box"];56[label="vx3",fontsize=16,color="green",shape="box"];57[label="Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ Zero))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))",fontsize=16,color="green",shape="box"];50[label="toLower1 vx30 (vx30 >= Char (Succ vx31) && vx30 <= Char (Succ vx32) || vx30 >= Char (Succ vx33) && vx30 <= Char (Succ vx34) || vx30 >= Char (Succ vx35) && vx30 <= Char (Succ vx36))",fontsize=16,color="black",shape="triangle"];50 -> 65[label="",style="solid", color="black", weight=3];
65[label="toLower1 vx30 (compare vx30 (Char (Succ vx31)) /= LT && vx30 <= Char (Succ vx32) || vx30 >= Char (Succ vx33) && vx30 <= Char (Succ vx34) || vx30 >= Char (Succ vx35) && vx30 <= Char (Succ vx36))",fontsize=16,color="black",shape="box"];65 -> 66[label="",style="solid", color="black", weight=3];
66[label="toLower1 vx30 (not (compare vx30 (Char (Succ vx31)) == LT) && vx30 <= Char (Succ vx32) || vx30 >= Char (Succ vx33) && vx30 <= Char (Succ vx34) || vx30 >= Char (Succ vx35) && vx30 <= Char (Succ vx36))",fontsize=16,color="black",shape="box"];66 -> 67[label="",style="solid", color="black", weight=3];
67[label="toLower1 vx30 (not (primCmpChar vx30 (Char (Succ vx31)) == LT) && vx30 <= Char (Succ vx32) || vx30 >= Char (Succ vx33) && vx30 <= Char (Succ vx34) || vx30 >= Char (Succ vx35) && vx30 <= Char (Succ vx36))",fontsize=16,color="burlywood",shape="box"];1291[label="vx30/Char vx300",fontsize=10,color="white",style="solid",shape="box"];67 -> 1291[label="",style="solid", color="burlywood", weight=9];
1291 -> 68[label="",style="solid", color="burlywood", weight=3];
68[label="toLower1 (Char vx300) (not (primCmpChar (Char vx300) (Char (Succ vx31)) == LT) && Char vx300 <= Char (Succ vx32) || Char vx300 >= Char (Succ vx33) && Char vx300 <= Char (Succ vx34) || Char vx300 >= Char (Succ vx35) && Char vx300 <= Char (Succ vx36))",fontsize=16,color="black",shape="box"];68 -> 69[label="",style="solid", color="black", weight=3];
69[label="toLower1 (Char vx300) (not (primCmpNat vx300 (Succ vx31) == LT) && Char vx300 <= Char (Succ vx32) || Char vx300 >= Char (Succ vx33) && Char vx300 <= Char (Succ vx34) || Char vx300 >= Char (Succ vx35) && Char vx300 <= Char (Succ vx36))",fontsize=16,color="burlywood",shape="box"];1292[label="vx300/Succ vx3000",fontsize=10,color="white",style="solid",shape="box"];69 -> 1292[label="",style="solid", color="burlywood", weight=9];
1292 -> 70[label="",style="solid", color="burlywood", weight=3];
1293[label="vx300/Zero",fontsize=10,color="white",style="solid",shape="box"];69 -> 1293[label="",style="solid", color="burlywood", weight=9];
1293 -> 71[label="",style="solid", color="burlywood", weight=3];
70[label="toLower1 (Char (Succ vx3000)) (not (primCmpNat (Succ vx3000) (Succ vx31) == LT) && Char (Succ vx3000) <= Char (Succ vx32) || Char (Succ vx3000) >= Char (Succ vx33) && Char (Succ vx3000) <= Char (Succ vx34) || Char (Succ vx3000) >= Char (Succ vx35) && Char (Succ vx3000) <= Char (Succ vx36))",fontsize=16,color="black",shape="box"];70 -> 72[label="",style="solid", color="black", weight=3];
71[label="toLower1 (Char Zero) (not (primCmpNat Zero (Succ vx31) == LT) && Char Zero <= Char (Succ vx32) || Char Zero >= Char (Succ vx33) && Char Zero <= Char (Succ vx34) || Char Zero >= Char (Succ vx35) && Char Zero <= Char (Succ vx36))",fontsize=16,color="black",shape="box"];71 -> 73[label="",style="solid", color="black", weight=3];
72 -> 216[label="",style="dashed", color="red", weight=0];
72[label="toLower1 (Char (Succ vx3000)) (not (primCmpNat vx3000 vx31 == LT) && Char (Succ vx3000) <= Char (Succ vx32) || Char (Succ vx3000) >= Char (Succ vx33) && Char (Succ vx3000) <= Char (Succ vx34) || Char (Succ vx3000) >= Char (Succ vx35) && Char (Succ vx3000) <= Char (Succ vx36))",fontsize=16,color="magenta"];72 -> 217[label="",style="dashed", color="magenta", weight=3];
72 -> 218[label="",style="dashed", color="magenta", weight=3];
72 -> 219[label="",style="dashed", color="magenta", weight=3];
72 -> 220[label="",style="dashed", color="magenta", weight=3];
72 -> 221[label="",style="dashed", color="magenta", weight=3];
72 -> 222[label="",style="dashed", color="magenta", weight=3];
72 -> 223[label="",style="dashed", color="magenta", weight=3];
72 -> 224[label="",style="dashed", color="magenta", weight=3];
73[label="toLower1 (Char Zero) (not (LT == LT) && Char Zero <= Char (Succ vx32) || Char Zero >= Char (Succ vx33) && Char Zero <= Char (Succ vx34) || Char Zero >= Char (Succ vx35) && Char Zero <= Char (Succ vx36))",fontsize=16,color="black",shape="box"];73 -> 76[label="",style="solid", color="black", weight=3];
217[label="vx33",fontsize=16,color="green",shape="box"];218[label="vx35",fontsize=16,color="green",shape="box"];219[label="vx31",fontsize=16,color="green",shape="box"];220[label="vx34",fontsize=16,color="green",shape="box"];221[label="vx3000",fontsize=16,color="green",shape="box"];222[label="vx36",fontsize=16,color="green",shape="box"];223[label="vx3000",fontsize=16,color="green",shape="box"];224[label="vx32",fontsize=16,color="green",shape="box"];216[label="toLower1 (Char (Succ vx38)) (not (primCmpNat vx39 vx40 == LT) && Char (Succ vx38) <= Char (Succ vx41) || Char (Succ vx38) >= Char (Succ vx42) && Char (Succ vx38) <= Char (Succ vx43) || Char (Succ vx38) >= Char (Succ vx44) && Char (Succ vx38) <= Char (Succ vx45))",fontsize=16,color="burlywood",shape="triangle"];1295[label="vx39/Succ vx390",fontsize=10,color="white",style="solid",shape="box"];216 -> 1295[label="",style="solid", color="burlywood", weight=9];
1295 -> 265[label="",style="solid", color="burlywood", weight=3];
1296[label="vx39/Zero",fontsize=10,color="white",style="solid",shape="box"];216 -> 1296[label="",style="solid", color="burlywood", weight=9];
1296 -> 266[label="",style="solid", color="burlywood", weight=3];
76[label="toLower1 (Char Zero) (not True && Char Zero <= Char (Succ vx32) || Char Zero >= Char (Succ vx33) && Char Zero <= Char (Succ vx34) || Char Zero >= Char (Succ vx35) && Char Zero <= Char (Succ vx36))",fontsize=16,color="black",shape="box"];76 -> 81[label="",style="solid", color="black", weight=3];
265[label="toLower1 (Char (Succ vx38)) (not (primCmpNat (Succ vx390) vx40 == LT) && Char (Succ vx38) <= Char (Succ vx41) || Char (Succ vx38) >= Char (Succ vx42) && Char (Succ vx38) <= Char (Succ vx43) || Char (Succ vx38) >= Char (Succ vx44) && Char (Succ vx38) <= Char (Succ vx45))",fontsize=16,color="burlywood",shape="box"];1297[label="vx40/Succ vx400",fontsize=10,color="white",style="solid",shape="box"];265 -> 1297[label="",style="solid", color="burlywood", weight=9];
1297 -> 268[label="",style="solid", color="burlywood", weight=3];
1298[label="vx40/Zero",fontsize=10,color="white",style="solid",shape="box"];265 -> 1298[label="",style="solid", color="burlywood", weight=9];
1298 -> 269[label="",style="solid", color="burlywood", weight=3];
266[label="toLower1 (Char (Succ vx38)) (not (primCmpNat Zero vx40 == LT) && Char (Succ vx38) <= Char (Succ vx41) || Char (Succ vx38) >= Char (Succ vx42) && Char (Succ vx38) <= Char (Succ vx43) || Char (Succ vx38) >= Char (Succ vx44) && Char (Succ vx38) <= Char (Succ vx45))",fontsize=16,color="burlywood",shape="box"];1299[label="vx40/Succ vx400",fontsize=10,color="white",style="solid",shape="box"];266 -> 1299[label="",style="solid", color="burlywood", weight=9];
1299 -> 270[label="",style="solid", color="burlywood", weight=3];
1300[label="vx40/Zero",fontsize=10,color="white",style="solid",shape="box"];266 -> 1300[label="",style="solid", color="burlywood", weight=9];
1300 -> 271[label="",style="solid", color="burlywood", weight=3];
81[label="toLower1 (Char Zero) (False && Char Zero <= Char (Succ vx32) || Char Zero >= Char (Succ vx33) && Char Zero <= Char (Succ vx34) || Char Zero >= Char (Succ vx35) && Char Zero <= Char (Succ vx36))",fontsize=16,color="black",shape="box"];81 -> 86[label="",style="solid", color="black", weight=3];
268[label="toLower1 (Char (Succ vx38)) (not (primCmpNat (Succ vx390) (Succ vx400) == LT) && Char (Succ vx38) <= Char (Succ vx41) || Char (Succ vx38) >= Char (Succ vx42) && Char (Succ vx38) <= Char (Succ vx43) || Char (Succ vx38) >= Char (Succ vx44) && Char (Succ vx38) <= Char (Succ vx45))",fontsize=16,color="black",shape="box"];268 -> 273[label="",style="solid", color="black", weight=3];
269[label="toLower1 (Char (Succ vx38)) (not (primCmpNat (Succ vx390) Zero == LT) && Char (Succ vx38) <= Char (Succ vx41) || Char (Succ vx38) >= Char (Succ vx42) && Char (Succ vx38) <= Char (Succ vx43) || Char (Succ vx38) >= Char (Succ vx44) && Char (Succ vx38) <= Char (Succ vx45))",fontsize=16,color="black",shape="box"];269 -> 274[label="",style="solid", color="black", weight=3];
270[label="toLower1 (Char (Succ vx38)) (not (primCmpNat Zero (Succ vx400) == LT) && Char (Succ vx38) <= Char (Succ vx41) || Char (Succ vx38) >= Char (Succ vx42) && Char (Succ vx38) <= Char (Succ vx43) || Char (Succ vx38) >= Char (Succ vx44) && Char (Succ vx38) <= Char (Succ vx45))",fontsize=16,color="black",shape="box"];270 -> 275[label="",style="solid", color="black", weight=3];
271[label="toLower1 (Char (Succ vx38)) (not (primCmpNat Zero Zero == LT) && Char (Succ vx38) <= Char (Succ vx41) || Char (Succ vx38) >= Char (Succ vx42) && Char (Succ vx38) <= Char (Succ vx43) || Char (Succ vx38) >= Char (Succ vx44) && Char (Succ vx38) <= Char (Succ vx45))",fontsize=16,color="black",shape="box"];271 -> 276[label="",style="solid", color="black", weight=3];
86[label="toLower1 (Char Zero) (False || Char Zero >= Char (Succ vx33) && Char Zero <= Char (Succ vx34) || Char Zero >= Char (Succ vx35) && Char Zero <= Char (Succ vx36))",fontsize=16,color="black",shape="box"];86 -> 92[label="",style="solid", color="black", weight=3];
273 -> 216[label="",style="dashed", color="red", weight=0];
273[label="toLower1 (Char (Succ vx38)) (not (primCmpNat vx390 vx400 == LT) && Char (Succ vx38) <= Char (Succ vx41) || Char (Succ vx38) >= Char (Succ vx42) && Char (Succ vx38) <= Char (Succ vx43) || Char (Succ vx38) >= Char (Succ vx44) && Char (Succ vx38) <= Char (Succ vx45))",fontsize=16,color="magenta"];273 -> 278[label="",style="dashed", color="magenta", weight=3];
273 -> 279[label="",style="dashed", color="magenta", weight=3];
274[label="toLower1 (Char (Succ vx38)) (not (GT == LT) && Char (Succ vx38) <= Char (Succ vx41) || Char (Succ vx38) >= Char (Succ vx42) && Char (Succ vx38) <= Char (Succ vx43) || Char (Succ vx38) >= Char (Succ vx44) && Char (Succ vx38) <= Char (Succ vx45))",fontsize=16,color="black",shape="box"];274 -> 280[label="",style="solid", color="black", weight=3];
275[label="toLower1 (Char (Succ vx38)) (not (LT == LT) && Char (Succ vx38) <= Char (Succ vx41) || Char (Succ vx38) >= Char (Succ vx42) && Char (Succ vx38) <= Char (Succ vx43) || Char (Succ vx38) >= Char (Succ vx44) && Char (Succ vx38) <= Char (Succ vx45))",fontsize=16,color="black",shape="box"];275 -> 281[label="",style="solid", color="black", weight=3];
276[label="toLower1 (Char (Succ vx38)) (not (EQ == LT) && Char (Succ vx38) <= Char (Succ vx41) || Char (Succ vx38) >= Char (Succ vx42) && Char (Succ vx38) <= Char (Succ vx43) || Char (Succ vx38) >= Char (Succ vx44) && Char (Succ vx38) <= Char (Succ vx45))",fontsize=16,color="black",shape="box"];276 -> 282[label="",style="solid", color="black", weight=3];
92[label="toLower1 (Char Zero) (Char Zero >= Char (Succ vx33) && Char Zero <= Char (Succ vx34) || Char Zero >= Char (Succ vx35) && Char Zero <= Char (Succ vx36))",fontsize=16,color="black",shape="box"];92 -> 100[label="",style="solid", color="black", weight=3];
278[label="vx400",fontsize=16,color="green",shape="box"];279[label="vx390",fontsize=16,color="green",shape="box"];280[label="toLower1 (Char (Succ vx38)) (not False && Char (Succ vx38) <= Char (Succ vx41) || Char (Succ vx38) >= Char (Succ vx42) && Char (Succ vx38) <= Char (Succ vx43) || Char (Succ vx38) >= Char (Succ vx44) && Char (Succ vx38) <= Char (Succ vx45))",fontsize=16,color="black",shape="triangle"];280 -> 284[label="",style="solid", color="black", weight=3];
281[label="toLower1 (Char (Succ vx38)) (not True && Char (Succ vx38) <= Char (Succ vx41) || Char (Succ vx38) >= Char (Succ vx42) && Char (Succ vx38) <= Char (Succ vx43) || Char (Succ vx38) >= Char (Succ vx44) && Char (Succ vx38) <= Char (Succ vx45))",fontsize=16,color="black",shape="box"];281 -> 285[label="",style="solid", color="black", weight=3];
282 -> 280[label="",style="dashed", color="red", weight=0];
282[label="toLower1 (Char (Succ vx38)) (not False && Char (Succ vx38) <= Char (Succ vx41) || Char (Succ vx38) >= Char (Succ vx42) && Char (Succ vx38) <= Char (Succ vx43) || Char (Succ vx38) >= Char (Succ vx44) && Char (Succ vx38) <= Char (Succ vx45))",fontsize=16,color="magenta"];100[label="toLower1 (Char Zero) (compare (Char Zero) (Char (Succ vx33)) /= LT && Char Zero <= Char (Succ vx34) || Char Zero >= Char (Succ vx35) && Char Zero <= Char (Succ vx36))",fontsize=16,color="black",shape="box"];100 -> 108[label="",style="solid", color="black", weight=3];
284[label="toLower1 (Char (Succ vx38)) (True && Char (Succ vx38) <= Char (Succ vx41) || Char (Succ vx38) >= Char (Succ vx42) && Char (Succ vx38) <= Char (Succ vx43) || Char (Succ vx38) >= Char (Succ vx44) && Char (Succ vx38) <= Char (Succ vx45))",fontsize=16,color="black",shape="box"];284 -> 287[label="",style="solid", color="black", weight=3];
285[label="toLower1 (Char (Succ vx38)) (False && Char (Succ vx38) <= Char (Succ vx41) || Char (Succ vx38) >= Char (Succ vx42) && Char (Succ vx38) <= Char (Succ vx43) || Char (Succ vx38) >= Char (Succ vx44) && Char (Succ vx38) <= Char (Succ vx45))",fontsize=16,color="black",shape="box"];285 -> 288[label="",style="solid", color="black", weight=3];
108[label="toLower1 (Char Zero) (not (compare (Char Zero) (Char (Succ vx33)) == LT) && Char Zero <= Char (Succ vx34) || Char Zero >= Char (Succ vx35) && Char Zero <= Char (Succ vx36))",fontsize=16,color="black",shape="box"];108 -> 117[label="",style="solid", color="black", weight=3];
287[label="toLower1 (Char (Succ vx38)) (Char (Succ vx38) <= Char (Succ vx41) || Char (Succ vx38) >= Char (Succ vx42) && Char (Succ vx38) <= Char (Succ vx43) || Char (Succ vx38) >= Char (Succ vx44) && Char (Succ vx38) <= Char (Succ vx45))",fontsize=16,color="black",shape="box"];287 -> 290[label="",style="solid", color="black", weight=3];
288[label="toLower1 (Char (Succ vx38)) (False || Char (Succ vx38) >= Char (Succ vx42) && Char (Succ vx38) <= Char (Succ vx43) || Char (Succ vx38) >= Char (Succ vx44) && Char (Succ vx38) <= Char (Succ vx45))",fontsize=16,color="black",shape="triangle"];288 -> 291[label="",style="solid", color="black", weight=3];
117[label="toLower1 (Char Zero) (not (primCmpChar (Char Zero) (Char (Succ vx33)) == LT) && Char Zero <= Char (Succ vx34) || Char Zero >= Char (Succ vx35) && Char Zero <= Char (Succ vx36))",fontsize=16,color="black",shape="box"];117 -> 127[label="",style="solid", color="black", weight=3];
290[label="toLower1 (Char (Succ vx38)) (compare (Char (Succ vx38)) (Char (Succ vx41)) /= GT || Char (Succ vx38) >= Char (Succ vx42) && Char (Succ vx38) <= Char (Succ vx43) || Char (Succ vx38) >= Char (Succ vx44) && Char (Succ vx38) <= Char (Succ vx45))",fontsize=16,color="black",shape="box"];290 -> 293[label="",style="solid", color="black", weight=3];
291[label="toLower1 (Char (Succ vx38)) (Char (Succ vx38) >= Char (Succ vx42) && Char (Succ vx38) <= Char (Succ vx43) || Char (Succ vx38) >= Char (Succ vx44) && Char (Succ vx38) <= Char (Succ vx45))",fontsize=16,color="black",shape="box"];291 -> 294[label="",style="solid", color="black", weight=3];
127[label="toLower1 (Char Zero) (not (primCmpNat Zero (Succ vx33) == LT) && Char Zero <= Char (Succ vx34) || Char Zero >= Char (Succ vx35) && Char Zero <= Char (Succ vx36))",fontsize=16,color="black",shape="box"];127 -> 136[label="",style="solid", color="black", weight=3];
293[label="toLower1 (Char (Succ vx38)) (not (compare (Char (Succ vx38)) (Char (Succ vx41)) == GT) || Char (Succ vx38) >= Char (Succ vx42) && Char (Succ vx38) <= Char (Succ vx43) || Char (Succ vx38) >= Char (Succ vx44) && Char (Succ vx38) <= Char (Succ vx45))",fontsize=16,color="black",shape="box"];293 -> 296[label="",style="solid", color="black", weight=3];
294[label="toLower1 (Char (Succ vx38)) (compare (Char (Succ vx38)) (Char (Succ vx42)) /= LT && Char (Succ vx38) <= Char (Succ vx43) || Char (Succ vx38) >= Char (Succ vx44) && Char (Succ vx38) <= Char (Succ vx45))",fontsize=16,color="black",shape="box"];294 -> 297[label="",style="solid", color="black", weight=3];
136[label="toLower1 (Char Zero) (not (LT == LT) && Char Zero <= Char (Succ vx34) || Char Zero >= Char (Succ vx35) && Char Zero <= Char (Succ vx36))",fontsize=16,color="black",shape="box"];136 -> 146[label="",style="solid", color="black", weight=3];
296[label="toLower1 (Char (Succ vx38)) (not (primCmpChar (Char (Succ vx38)) (Char (Succ vx41)) == GT) || Char (Succ vx38) >= Char (Succ vx42) && Char (Succ vx38) <= Char (Succ vx43) || Char (Succ vx38) >= Char (Succ vx44) && Char (Succ vx38) <= Char (Succ vx45))",fontsize=16,color="black",shape="box"];296 -> 299[label="",style="solid", color="black", weight=3];
297[label="toLower1 (Char (Succ vx38)) (not (compare (Char (Succ vx38)) (Char (Succ vx42)) == LT) && Char (Succ vx38) <= Char (Succ vx43) || Char (Succ vx38) >= Char (Succ vx44) && Char (Succ vx38) <= Char (Succ vx45))",fontsize=16,color="black",shape="box"];297 -> 300[label="",style="solid", color="black", weight=3];
146[label="toLower1 (Char Zero) (not True && Char Zero <= Char (Succ vx34) || Char Zero >= Char (Succ vx35) && Char Zero <= Char (Succ vx36))",fontsize=16,color="black",shape="box"];146 -> 157[label="",style="solid", color="black", weight=3];
299 -> 598[label="",style="dashed", color="red", weight=0];
299[label="toLower1 (Char (Succ vx38)) (not (primCmpNat (Succ vx38) (Succ vx41) == GT) || Char (Succ vx38) >= Char (Succ vx42) && Char (Succ vx38) <= Char (Succ vx43) || Char (Succ vx38) >= Char (Succ vx44) && Char (Succ vx38) <= Char (Succ vx45))",fontsize=16,color="magenta"];299 -> 599[label="",style="dashed", color="magenta", weight=3];
299 -> 600[label="",style="dashed", color="magenta", weight=3];
299 -> 601[label="",style="dashed", color="magenta", weight=3];
299 -> 602[label="",style="dashed", color="magenta", weight=3];
299 -> 603[label="",style="dashed", color="magenta", weight=3];
299 -> 604[label="",style="dashed", color="magenta", weight=3];
299 -> 605[label="",style="dashed", color="magenta", weight=3];
300[label="toLower1 (Char (Succ vx38)) (not (primCmpChar (Char (Succ vx38)) (Char (Succ vx42)) == LT) && Char (Succ vx38) <= Char (Succ vx43) || Char (Succ vx38) >= Char (Succ vx44) && Char (Succ vx38) <= Char (Succ vx45))",fontsize=16,color="black",shape="box"];300 -> 302[label="",style="solid", color="black", weight=3];
157[label="toLower1 (Char Zero) (False && Char Zero <= Char (Succ vx34) || Char Zero >= Char (Succ vx35) && Char Zero <= Char (Succ vx36))",fontsize=16,color="black",shape="box"];157 -> 169[label="",style="solid", color="black", weight=3];
599[label="vx42",fontsize=16,color="green",shape="box"];600[label="vx38",fontsize=16,color="green",shape="box"];601[label="vx45",fontsize=16,color="green",shape="box"];602[label="vx43",fontsize=16,color="green",shape="box"];603[label="vx44",fontsize=16,color="green",shape="box"];604[label="Succ vx41",fontsize=16,color="green",shape="box"];605[label="Succ vx38",fontsize=16,color="green",shape="box"];598[label="toLower1 (Char (Succ vx72)) (not (primCmpNat vx73 vx74 == GT) || Char (Succ vx72) >= Char (Succ vx75) && Char (Succ vx72) <= Char (Succ vx76) || Char (Succ vx72) >= Char (Succ vx77) && Char (Succ vx72) <= Char (Succ vx78))",fontsize=16,color="burlywood",shape="triangle"];1304[label="vx73/Succ vx730",fontsize=10,color="white",style="solid",shape="box"];598 -> 1304[label="",style="solid", color="burlywood", weight=9];
1304 -> 648[label="",style="solid", color="burlywood", weight=3];
1305[label="vx73/Zero",fontsize=10,color="white",style="solid",shape="box"];598 -> 1305[label="",style="solid", color="burlywood", weight=9];
1305 -> 649[label="",style="solid", color="burlywood", weight=3];
302 -> 669[label="",style="dashed", color="red", weight=0];
302[label="toLower1 (Char (Succ vx38)) (not (primCmpNat (Succ vx38) (Succ vx42) == LT) && Char (Succ vx38) <= Char (Succ vx43) || Char (Succ vx38) >= Char (Succ vx44) && Char (Succ vx38) <= Char (Succ vx45))",fontsize=16,color="magenta"];302 -> 670[label="",style="dashed", color="magenta", weight=3];
302 -> 671[label="",style="dashed", color="magenta", weight=3];
302 -> 672[label="",style="dashed", color="magenta", weight=3];
302 -> 673[label="",style="dashed", color="magenta", weight=3];
302 -> 674[label="",style="dashed", color="magenta", weight=3];
302 -> 675[label="",style="dashed", color="magenta", weight=3];
169[label="toLower1 (Char Zero) (False || Char Zero >= Char (Succ vx35) && Char Zero <= Char (Succ vx36))",fontsize=16,color="black",shape="box"];169 -> 183[label="",style="solid", color="black", weight=3];
648[label="toLower1 (Char (Succ vx72)) (not (primCmpNat (Succ vx730) vx74 == GT) || Char (Succ vx72) >= Char (Succ vx75) && Char (Succ vx72) <= Char (Succ vx76) || Char (Succ vx72) >= Char (Succ vx77) && Char (Succ vx72) <= Char (Succ vx78))",fontsize=16,color="burlywood",shape="box"];1307[label="vx74/Succ vx740",fontsize=10,color="white",style="solid",shape="box"];648 -> 1307[label="",style="solid", color="burlywood", weight=9];
1307 -> 665[label="",style="solid", color="burlywood", weight=3];
1308[label="vx74/Zero",fontsize=10,color="white",style="solid",shape="box"];648 -> 1308[label="",style="solid", color="burlywood", weight=9];
1308 -> 666[label="",style="solid", color="burlywood", weight=3];
649[label="toLower1 (Char (Succ vx72)) (not (primCmpNat Zero vx74 == GT) || Char (Succ vx72) >= Char (Succ vx75) && Char (Succ vx72) <= Char (Succ vx76) || Char (Succ vx72) >= Char (Succ vx77) && Char (Succ vx72) <= Char (Succ vx78))",fontsize=16,color="burlywood",shape="box"];1309[label="vx74/Succ vx740",fontsize=10,color="white",style="solid",shape="box"];649 -> 1309[label="",style="solid", color="burlywood", weight=9];
1309 -> 667[label="",style="solid", color="burlywood", weight=3];
1310[label="vx74/Zero",fontsize=10,color="white",style="solid",shape="box"];649 -> 1310[label="",style="solid", color="burlywood", weight=9];
1310 -> 668[label="",style="solid", color="burlywood", weight=3];
670[label="vx43",fontsize=16,color="green",shape="box"];671[label="Succ vx42",fontsize=16,color="green",shape="box"];672[label="vx45",fontsize=16,color="green",shape="box"];673[label="Succ vx38",fontsize=16,color="green",shape="box"];674[label="vx38",fontsize=16,color="green",shape="box"];675[label="vx44",fontsize=16,color="green",shape="box"];669[label="toLower1 (Char (Succ vx80)) (not (primCmpNat vx81 vx82 == LT) && Char (Succ vx80) <= Char (Succ vx83) || Char (Succ vx80) >= Char (Succ vx84) && Char (Succ vx80) <= Char (Succ vx85))",fontsize=16,color="burlywood",shape="triangle"];1311[label="vx81/Succ vx810",fontsize=10,color="white",style="solid",shape="box"];669 -> 1311[label="",style="solid", color="burlywood", weight=9];
1311 -> 712[label="",style="solid", color="burlywood", weight=3];
1312[label="vx81/Zero",fontsize=10,color="white",style="solid",shape="box"];669 -> 1312[label="",style="solid", color="burlywood", weight=9];
1312 -> 713[label="",style="solid", color="burlywood", weight=3];
183[label="toLower1 (Char Zero) (Char Zero >= Char (Succ vx35) && Char Zero <= Char (Succ vx36))",fontsize=16,color="black",shape="box"];183 -> 199[label="",style="solid", color="black", weight=3];
665[label="toLower1 (Char (Succ vx72)) (not (primCmpNat (Succ vx730) (Succ vx740) == GT) || Char (Succ vx72) >= Char (Succ vx75) && Char (Succ vx72) <= Char (Succ vx76) || Char (Succ vx72) >= Char (Succ vx77) && Char (Succ vx72) <= Char (Succ vx78))",fontsize=16,color="black",shape="box"];665 -> 714[label="",style="solid", color="black", weight=3];
666[label="toLower1 (Char (Succ vx72)) (not (primCmpNat (Succ vx730) Zero == GT) || Char (Succ vx72) >= Char (Succ vx75) && Char (Succ vx72) <= Char (Succ vx76) || Char (Succ vx72) >= Char (Succ vx77) && Char (Succ vx72) <= Char (Succ vx78))",fontsize=16,color="black",shape="box"];666 -> 715[label="",style="solid", color="black", weight=3];
667[label="toLower1 (Char (Succ vx72)) (not (primCmpNat Zero (Succ vx740) == GT) || Char (Succ vx72) >= Char (Succ vx75) && Char (Succ vx72) <= Char (Succ vx76) || Char (Succ vx72) >= Char (Succ vx77) && Char (Succ vx72) <= Char (Succ vx78))",fontsize=16,color="black",shape="box"];667 -> 716[label="",style="solid", color="black", weight=3];
668[label="toLower1 (Char (Succ vx72)) (not (primCmpNat Zero Zero == GT) || Char (Succ vx72) >= Char (Succ vx75) && Char (Succ vx72) <= Char (Succ vx76) || Char (Succ vx72) >= Char (Succ vx77) && Char (Succ vx72) <= Char (Succ vx78))",fontsize=16,color="black",shape="box"];668 -> 717[label="",style="solid", color="black", weight=3];
712[label="toLower1 (Char (Succ vx80)) (not (primCmpNat (Succ vx810) vx82 == LT) && Char (Succ vx80) <= Char (Succ vx83) || Char (Succ vx80) >= Char (Succ vx84) && Char (Succ vx80) <= Char (Succ vx85))",fontsize=16,color="burlywood",shape="box"];1313[label="vx82/Succ vx820",fontsize=10,color="white",style="solid",shape="box"];712 -> 1313[label="",style="solid", color="burlywood", weight=9];
1313 -> 718[label="",style="solid", color="burlywood", weight=3];
1314[label="vx82/Zero",fontsize=10,color="white",style="solid",shape="box"];712 -> 1314[label="",style="solid", color="burlywood", weight=9];
1314 -> 719[label="",style="solid", color="burlywood", weight=3];
713[label="toLower1 (Char (Succ vx80)) (not (primCmpNat Zero vx82 == LT) && Char (Succ vx80) <= Char (Succ vx83) || Char (Succ vx80) >= Char (Succ vx84) && Char (Succ vx80) <= Char (Succ vx85))",fontsize=16,color="burlywood",shape="box"];1315[label="vx82/Succ vx820",fontsize=10,color="white",style="solid",shape="box"];713 -> 1315[label="",style="solid", color="burlywood", weight=9];
1315 -> 720[label="",style="solid", color="burlywood", weight=3];
1316[label="vx82/Zero",fontsize=10,color="white",style="solid",shape="box"];713 -> 1316[label="",style="solid", color="burlywood", weight=9];
1316 -> 721[label="",style="solid", color="burlywood", weight=3];
199[label="toLower1 (Char Zero) (compare (Char Zero) (Char (Succ vx35)) /= LT && Char Zero <= Char (Succ vx36))",fontsize=16,color="black",shape="box"];199 -> 215[label="",style="solid", color="black", weight=3];
714 -> 598[label="",style="dashed", color="red", weight=0];
714[label="toLower1 (Char (Succ vx72)) (not (primCmpNat vx730 vx740 == GT) || Char (Succ vx72) >= Char (Succ vx75) && Char (Succ vx72) <= Char (Succ vx76) || Char (Succ vx72) >= Char (Succ vx77) && Char (Succ vx72) <= Char (Succ vx78))",fontsize=16,color="magenta"];714 -> 722[label="",style="dashed", color="magenta", weight=3];
714 -> 723[label="",style="dashed", color="magenta", weight=3];
715[label="toLower1 (Char (Succ vx72)) (not (GT == GT) || Char (Succ vx72) >= Char (Succ vx75) && Char (Succ vx72) <= Char (Succ vx76) || Char (Succ vx72) >= Char (Succ vx77) && Char (Succ vx72) <= Char (Succ vx78))",fontsize=16,color="black",shape="box"];715 -> 724[label="",style="solid", color="black", weight=3];
716[label="toLower1 (Char (Succ vx72)) (not (LT == GT) || Char (Succ vx72) >= Char (Succ vx75) && Char (Succ vx72) <= Char (Succ vx76) || Char (Succ vx72) >= Char (Succ vx77) && Char (Succ vx72) <= Char (Succ vx78))",fontsize=16,color="black",shape="box"];716 -> 725[label="",style="solid", color="black", weight=3];
717[label="toLower1 (Char (Succ vx72)) (not (EQ == GT) || Char (Succ vx72) >= Char (Succ vx75) && Char (Succ vx72) <= Char (Succ vx76) || Char (Succ vx72) >= Char (Succ vx77) && Char (Succ vx72) <= Char (Succ vx78))",fontsize=16,color="black",shape="box"];717 -> 726[label="",style="solid", color="black", weight=3];
718[label="toLower1 (Char (Succ vx80)) (not (primCmpNat (Succ vx810) (Succ vx820) == LT) && Char (Succ vx80) <= Char (Succ vx83) || Char (Succ vx80) >= Char (Succ vx84) && Char (Succ vx80) <= Char (Succ vx85))",fontsize=16,color="black",shape="box"];718 -> 727[label="",style="solid", color="black", weight=3];
719[label="toLower1 (Char (Succ vx80)) (not (primCmpNat (Succ vx810) Zero == LT) && Char (Succ vx80) <= Char (Succ vx83) || Char (Succ vx80) >= Char (Succ vx84) && Char (Succ vx80) <= Char (Succ vx85))",fontsize=16,color="black",shape="box"];719 -> 728[label="",style="solid", color="black", weight=3];
720[label="toLower1 (Char (Succ vx80)) (not (primCmpNat Zero (Succ vx820) == LT) && Char (Succ vx80) <= Char (Succ vx83) || Char (Succ vx80) >= Char (Succ vx84) && Char (Succ vx80) <= Char (Succ vx85))",fontsize=16,color="black",shape="box"];720 -> 729[label="",style="solid", color="black", weight=3];
721[label="toLower1 (Char (Succ vx80)) (not (primCmpNat Zero Zero == LT) && Char (Succ vx80) <= Char (Succ vx83) || Char (Succ vx80) >= Char (Succ vx84) && Char (Succ vx80) <= Char (Succ vx85))",fontsize=16,color="black",shape="box"];721 -> 730[label="",style="solid", color="black", weight=3];
215[label="toLower1 (Char Zero) (not (compare (Char Zero) (Char (Succ vx35)) == LT) && Char Zero <= Char (Succ vx36))",fontsize=16,color="black",shape="box"];215 -> 267[label="",style="solid", color="black", weight=3];
722[label="vx740",fontsize=16,color="green",shape="box"];723[label="vx730",fontsize=16,color="green",shape="box"];724[label="toLower1 (Char (Succ vx72)) (not True || Char (Succ vx72) >= Char (Succ vx75) && Char (Succ vx72) <= Char (Succ vx76) || Char (Succ vx72) >= Char (Succ vx77) && Char (Succ vx72) <= Char (Succ vx78))",fontsize=16,color="black",shape="box"];724 -> 731[label="",style="solid", color="black", weight=3];
725[label="toLower1 (Char (Succ vx72)) (not False || Char (Succ vx72) >= Char (Succ vx75) && Char (Succ vx72) <= Char (Succ vx76) || Char (Succ vx72) >= Char (Succ vx77) && Char (Succ vx72) <= Char (Succ vx78))",fontsize=16,color="black",shape="triangle"];725 -> 732[label="",style="solid", color="black", weight=3];
726 -> 725[label="",style="dashed", color="red", weight=0];
726[label="toLower1 (Char (Succ vx72)) (not False || Char (Succ vx72) >= Char (Succ vx75) && Char (Succ vx72) <= Char (Succ vx76) || Char (Succ vx72) >= Char (Succ vx77) && Char (Succ vx72) <= Char (Succ vx78))",fontsize=16,color="magenta"];727 -> 669[label="",style="dashed", color="red", weight=0];
727[label="toLower1 (Char (Succ vx80)) (not (primCmpNat vx810 vx820 == LT) && Char (Succ vx80) <= Char (Succ vx83) || Char (Succ vx80) >= Char (Succ vx84) && Char (Succ vx80) <= Char (Succ vx85))",fontsize=16,color="magenta"];727 -> 733[label="",style="dashed", color="magenta", weight=3];
727 -> 734[label="",style="dashed", color="magenta", weight=3];
728[label="toLower1 (Char (Succ vx80)) (not (GT == LT) && Char (Succ vx80) <= Char (Succ vx83) || Char (Succ vx80) >= Char (Succ vx84) && Char (Succ vx80) <= Char (Succ vx85))",fontsize=16,color="black",shape="box"];728 -> 735[label="",style="solid", color="black", weight=3];
729[label="toLower1 (Char (Succ vx80)) (not (LT == LT) && Char (Succ vx80) <= Char (Succ vx83) || Char (Succ vx80) >= Char (Succ vx84) && Char (Succ vx80) <= Char (Succ vx85))",fontsize=16,color="black",shape="box"];729 -> 736[label="",style="solid", color="black", weight=3];
730[label="toLower1 (Char (Succ vx80)) (not (EQ == LT) && Char (Succ vx80) <= Char (Succ vx83) || Char (Succ vx80) >= Char (Succ vx84) && Char (Succ vx80) <= Char (Succ vx85))",fontsize=16,color="black",shape="box"];730 -> 737[label="",style="solid", color="black", weight=3];
267[label="toLower1 (Char Zero) (not (primCmpChar (Char Zero) (Char (Succ vx35)) == LT) && Char Zero <= Char (Succ vx36))",fontsize=16,color="black",shape="box"];267 -> 272[label="",style="solid", color="black", weight=3];
731 -> 288[label="",style="dashed", color="red", weight=0];
731[label="toLower1 (Char (Succ vx72)) (False || Char (Succ vx72) >= Char (Succ vx75) && Char (Succ vx72) <= Char (Succ vx76) || Char (Succ vx72) >= Char (Succ vx77) && Char (Succ vx72) <= Char (Succ vx78))",fontsize=16,color="magenta"];731 -> 738[label="",style="dashed", color="magenta", weight=3];
731 -> 739[label="",style="dashed", color="magenta", weight=3];
731 -> 740[label="",style="dashed", color="magenta", weight=3];
731 -> 741[label="",style="dashed", color="magenta", weight=3];
731 -> 742[label="",style="dashed", color="magenta", weight=3];
732[label="toLower1 (Char (Succ vx72)) (True || Char (Succ vx72) >= Char (Succ vx75) && Char (Succ vx72) <= Char (Succ vx76) || Char (Succ vx72) >= Char (Succ vx77) && Char (Succ vx72) <= Char (Succ vx78))",fontsize=16,color="black",shape="box"];732 -> 743[label="",style="solid", color="black", weight=3];
733[label="vx820",fontsize=16,color="green",shape="box"];734[label="vx810",fontsize=16,color="green",shape="box"];735[label="toLower1 (Char (Succ vx80)) (not False && Char (Succ vx80) <= Char (Succ vx83) || Char (Succ vx80) >= Char (Succ vx84) && Char (Succ vx80) <= Char (Succ vx85))",fontsize=16,color="black",shape="triangle"];735 -> 744[label="",style="solid", color="black", weight=3];
736[label="toLower1 (Char (Succ vx80)) (not True && Char (Succ vx80) <= Char (Succ vx83) || Char (Succ vx80) >= Char (Succ vx84) && Char (Succ vx80) <= Char (Succ vx85))",fontsize=16,color="black",shape="box"];736 -> 745[label="",style="solid", color="black", weight=3];
737 -> 735[label="",style="dashed", color="red", weight=0];
737[label="toLower1 (Char (Succ vx80)) (not False && Char (Succ vx80) <= Char (Succ vx83) || Char (Succ vx80) >= Char (Succ vx84) && Char (Succ vx80) <= Char (Succ vx85))",fontsize=16,color="magenta"];272[label="toLower1 (Char Zero) (not (primCmpNat Zero (Succ vx35) == LT) && Char Zero <= Char (Succ vx36))",fontsize=16,color="black",shape="box"];272 -> 277[label="",style="solid", color="black", weight=3];
738[label="vx75",fontsize=16,color="green",shape="box"];739[label="vx77",fontsize=16,color="green",shape="box"];740[label="vx76",fontsize=16,color="green",shape="box"];741[label="vx72",fontsize=16,color="green",shape="box"];742[label="vx78",fontsize=16,color="green",shape="box"];743[label="toLower1 (Char (Succ vx72)) True",fontsize=16,color="black",shape="triangle"];743 -> 746[label="",style="solid", color="black", weight=3];
744[label="toLower1 (Char (Succ vx80)) (True && Char (Succ vx80) <= Char (Succ vx83) || Char (Succ vx80) >= Char (Succ vx84) && Char (Succ vx80) <= Char (Succ vx85))",fontsize=16,color="black",shape="box"];744 -> 747[label="",style="solid", color="black", weight=3];
745[label="toLower1 (Char (Succ vx80)) (False && Char (Succ vx80) <= Char (Succ vx83) || Char (Succ vx80) >= Char (Succ vx84) && Char (Succ vx80) <= Char (Succ vx85))",fontsize=16,color="black",shape="box"];745 -> 748[label="",style="solid", color="black", weight=3];
277[label="toLower1 (Char Zero) (not (LT == LT) && Char Zero <= Char (Succ vx36))",fontsize=16,color="black",shape="box"];277 -> 283[label="",style="solid", color="black", weight=3];
746[label="toEnum (fromEnum (Char (Succ vx72)) - fromEnum (Char (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ Zero)))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))) + fromEnum (Char (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ Zero)))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))",fontsize=16,color="black",shape="box"];746 -> 772[label="",style="solid", color="black", weight=3];
747[label="toLower1 (Char (Succ vx80)) (Char (Succ vx80) <= Char (Succ vx83) || Char (Succ vx80) >= Char (Succ vx84) && Char (Succ vx80) <= Char (Succ vx85))",fontsize=16,color="black",shape="box"];747 -> 752[label="",style="solid", color="black", weight=3];
748[label="toLower1 (Char (Succ vx80)) (False || Char (Succ vx80) >= Char (Succ vx84) && Char (Succ vx80) <= Char (Succ vx85))",fontsize=16,color="black",shape="triangle"];748 -> 753[label="",style="solid", color="black", weight=3];
283[label="toLower1 (Char Zero) (not True && Char Zero <= Char (Succ vx36))",fontsize=16,color="black",shape="box"];283 -> 286[label="",style="solid", color="black", weight=3];
772 -> 796[label="",style="dashed", color="red", weight=0];
772[label="primIntToChar (fromEnum (Char (Succ vx72)) - fromEnum (Char (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ Zero)))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))) + fromEnum (Char (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ Zero)))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))",fontsize=16,color="magenta"];772 -> 797[label="",style="dashed", color="magenta", weight=3];
772 -> 798[label="",style="dashed", color="magenta", weight=3];
772 -> 799[label="",style="dashed", color="magenta", weight=3];
752[label="toLower1 (Char (Succ vx80)) (compare (Char (Succ vx80)) (Char (Succ vx83)) /= GT || Char (Succ vx80) >= Char (Succ vx84) && Char (Succ vx80) <= Char (Succ vx85))",fontsize=16,color="black",shape="box"];752 -> 770[label="",style="solid", color="black", weight=3];
753[label="toLower1 (Char (Succ vx80)) (Char (Succ vx80) >= Char (Succ vx84) && Char (Succ vx80) <= Char (Succ vx85))",fontsize=16,color="black",shape="box"];753 -> 771[label="",style="solid", color="black", weight=3];
286[label="toLower1 (Char Zero) (False && Char Zero <= Char (Succ vx36))",fontsize=16,color="black",shape="box"];286 -> 289[label="",style="solid", color="black", weight=3];
797[label="vx72",fontsize=16,color="green",shape="box"];798[label="Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ Zero)))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))",fontsize=16,color="green",shape="box"];799[label="Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ (Succ Zero)))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))",fontsize=16,color="green",shape="box"];796[label="primIntToChar (fromEnum (Char (Succ vx97)) - fromEnum (Char (Succ vx98)) + fromEnum (Char (Succ vx99)))",fontsize=16,color="black",shape="triangle"];796 -> 803[label="",style="solid", color="black", weight=3];
770[label="toLower1 (Char (Succ vx80)) (not (compare (Char (Succ vx80)) (Char (Succ vx83)) == GT) || Char (Succ vx80) >= Char (Succ vx84) && Char (Succ vx80) <= Char (Succ vx85))",fontsize=16,color="black",shape="box"];770 -> 791[label="",style="solid", color="black", weight=3];
771[label="toLower1 (Char (Succ vx80)) (compare (Char (Succ vx80)) (Char (Succ vx84)) /= LT && Char (Succ vx80) <= Char (Succ vx85))",fontsize=16,color="black",shape="box"];771 -> 792[label="",style="solid", color="black", weight=3];
289[label="toLower1 (Char Zero) False",fontsize=16,color="black",shape="box"];289 -> 292[label="",style="solid", color="black", weight=3];
803[label="primIntToChar (primPlusInt (fromEnum (Char (Succ vx97)) - fromEnum (Char (Succ vx98))) (fromEnum (Char (Succ vx99))))",fontsize=16,color="black",shape="box"];803 -> 806[label="",style="solid", color="black", weight=3];
791[label="toLower1 (Char (Succ vx80)) (not (primCmpChar (Char (Succ vx80)) (Char (Succ vx83)) == GT) || Char (Succ vx80) >= Char (Succ vx84) && Char (Succ vx80) <= Char (Succ vx85))",fontsize=16,color="black",shape="box"];791 -> 804[label="",style="solid", color="black", weight=3];
792[label="toLower1 (Char (Succ vx80)) (not (compare (Char (Succ vx80)) (Char (Succ vx84)) == LT) && Char (Succ vx80) <= Char (Succ vx85))",fontsize=16,color="black",shape="box"];792 -> 805[label="",style="solid", color="black", weight=3];
292[label="toLower0 (Char Zero) otherwise",fontsize=16,color="black",shape="box"];292 -> 295[label="",style="solid", color="black", weight=3];
806[label="primIntToChar (primPlusInt (primMinusInt (fromEnum (Char (Succ vx97))) (fromEnum (Char (Succ vx98)))) (fromEnum (Char (Succ vx99))))",fontsize=16,color="black",shape="box"];806 -> 809[label="",style="solid", color="black", weight=3];
804 -> 1033[label="",style="dashed", color="red", weight=0];
804[label="toLower1 (Char (Succ vx80)) (not (primCmpNat (Succ vx80) (Succ vx83) == GT) || Char (Succ vx80) >= Char (Succ vx84) && Char (Succ vx80) <= Char (Succ vx85))",fontsize=16,color="magenta"];804 -> 1034[label="",style="dashed", color="magenta", weight=3];
804 -> 1035[label="",style="dashed", color="magenta", weight=3];
804 -> 1036[label="",style="dashed", color="magenta", weight=3];
804 -> 1037[label="",style="dashed", color="magenta", weight=3];
804 -> 1038[label="",style="dashed", color="magenta", weight=3];
805[label="toLower1 (Char (Succ vx80)) (not (primCmpChar (Char (Succ vx80)) (Char (Succ vx84)) == LT) && Char (Succ vx80) <= Char (Succ vx85))",fontsize=16,color="black",shape="box"];805 -> 808[label="",style="solid", color="black", weight=3];
295[label="toLower0 (Char Zero) True",fontsize=16,color="black",shape="box"];295 -> 298[label="",style="solid", color="black", weight=3];
809[label="primIntToChar (primPlusInt (primMinusInt (primCharToInt (Char (Succ vx97))) (fromEnum (Char (Succ vx98)))) (fromEnum (Char (Succ vx99))))",fontsize=16,color="black",shape="box"];809 -> 813[label="",style="solid", color="black", weight=3];
1034[label="Succ vx80",fontsize=16,color="green",shape="box"];1035[label="vx80",fontsize=16,color="green",shape="box"];1036[label="vx84",fontsize=16,color="green",shape="box"];1037[label="Succ vx83",fontsize=16,color="green",shape="box"];1038[label="vx85",fontsize=16,color="green",shape="box"];1033[label="toLower1 (Char (Succ vx101)) (not (primCmpNat vx102 vx103 == GT) || Char (Succ vx101) >= Char (Succ vx104) && Char (Succ vx101) <= Char (Succ vx105))",fontsize=16,color="burlywood",shape="triangle"];1324[label="vx102/Succ vx1020",fontsize=10,color="white",style="solid",shape="box"];1033 -> 1324[label="",style="solid", color="burlywood", weight=9];
1324 -> 1069[label="",style="solid", color="burlywood", weight=3];
1325[label="vx102/Zero",fontsize=10,color="white",style="solid",shape="box"];1033 -> 1325[label="",style="solid", color="burlywood", weight=9];
1325 -> 1070[label="",style="solid", color="burlywood", weight=3];
808 -> 1098[label="",style="dashed", color="red", weight=0];
808[label="toLower1 (Char (Succ vx80)) (not (primCmpNat (Succ vx80) (Succ vx84) == LT) && Char (Succ vx80) <= Char (Succ vx85))",fontsize=16,color="magenta"];808 -> 1099[label="",style="dashed", color="magenta", weight=3];
808 -> 1100[label="",style="dashed", color="magenta", weight=3];
808 -> 1101[label="",style="dashed", color="magenta", weight=3];
808 -> 1102[label="",style="dashed", color="magenta", weight=3];
298[label="Char Zero",fontsize=16,color="green",shape="box"];813[label="primIntToChar (primPlusInt (primMinusInt (Pos (Succ vx97)) (fromEnum (Char (Succ vx98)))) (fromEnum (Char (Succ vx99))))",fontsize=16,color="black",shape="box"];813 -> 820[label="",style="solid", color="black", weight=3];
1069[label="toLower1 (Char (Succ vx101)) (not (primCmpNat (Succ vx1020) vx103 == GT) || Char (Succ vx101) >= Char (Succ vx104) && Char (Succ vx101) <= Char (Succ vx105))",fontsize=16,color="burlywood",shape="box"];1327[label="vx103/Succ vx1030",fontsize=10,color="white",style="solid",shape="box"];1069 -> 1327[label="",style="solid", color="burlywood", weight=9];
1327 -> 1090[label="",style="solid", color="burlywood", weight=3];
1328[label="vx103/Zero",fontsize=10,color="white",style="solid",shape="box"];1069 -> 1328[label="",style="solid", color="burlywood", weight=9];
1328 -> 1091[label="",style="solid", color="burlywood", weight=3];
1070[label="toLower1 (Char (Succ vx101)) (not (primCmpNat Zero vx103 == GT) || Char (Succ vx101) >= Char (Succ vx104) && Char (Succ vx101) <= Char (Succ vx105))",fontsize=16,color="burlywood",shape="box"];1329[label="vx103/Succ vx1030",fontsize=10,color="white",style="solid",shape="box"];1070 -> 1329[label="",style="solid", color="burlywood", weight=9];
1329 -> 1092[label="",style="solid", color="burlywood", weight=3];
1330[label="vx103/Zero",fontsize=10,color="white",style="solid",shape="box"];1070 -> 1330[label="",style="solid", color="burlywood", weight=9];
1330 -> 1093[label="",style="solid", color="burlywood", weight=3];
1099[label="vx85",fontsize=16,color="green",shape="box"];1100[label="Succ vx84",fontsize=16,color="green",shape="box"];1101[label="vx80",fontsize=16,color="green",shape="box"];1102[label="Succ vx80",fontsize=16,color="green",shape="box"];1098[label="toLower1 (Char (Succ vx107)) (not (primCmpNat vx108 vx109 == LT) && Char (Succ vx107) <= Char (Succ vx110))",fontsize=16,color="burlywood",shape="triangle"];1331[label="vx108/Succ vx1080",fontsize=10,color="white",style="solid",shape="box"];1098 -> 1331[label="",style="solid", color="burlywood", weight=9];
1331 -> 1127[label="",style="solid", color="burlywood", weight=3];
1332[label="vx108/Zero",fontsize=10,color="white",style="solid",shape="box"];1098 -> 1332[label="",style="solid", color="burlywood", weight=9];
1332 -> 1128[label="",style="solid", color="burlywood", weight=3];
820[label="primIntToChar (primPlusInt (primMinusInt (Pos (Succ vx97)) (primCharToInt (Char (Succ vx98)))) (fromEnum (Char (Succ vx99))))",fontsize=16,color="black",shape="box"];820 -> 829[label="",style="solid", color="black", weight=3];
1090[label="toLower1 (Char (Succ vx101)) (not (primCmpNat (Succ vx1020) (Succ vx1030) == GT) || Char (Succ vx101) >= Char (Succ vx104) && Char (Succ vx101) <= Char (Succ vx105))",fontsize=16,color="black",shape="box"];1090 -> 1129[label="",style="solid", color="black", weight=3];
1091[label="toLower1 (Char (Succ vx101)) (not (primCmpNat (Succ vx1020) Zero == GT) || Char (Succ vx101) >= Char (Succ vx104) && Char (Succ vx101) <= Char (Succ vx105))",fontsize=16,color="black",shape="box"];1091 -> 1130[label="",style="solid", color="black", weight=3];
1092[label="toLower1 (Char (Succ vx101)) (not (primCmpNat Zero (Succ vx1030) == GT) || Char (Succ vx101) >= Char (Succ vx104) && Char (Succ vx101) <= Char (Succ vx105))",fontsize=16,color="black",shape="box"];1092 -> 1131[label="",style="solid", color="black", weight=3];
1093[label="toLower1 (Char (Succ vx101)) (not (primCmpNat Zero Zero == GT) || Char (Succ vx101) >= Char (Succ vx104) && Char (Succ vx101) <= Char (Succ vx105))",fontsize=16,color="black",shape="box"];1093 -> 1132[label="",style="solid", color="black", weight=3];
1127[label="toLower1 (Char (Succ vx107)) (not (primCmpNat (Succ vx1080) vx109 == LT) && Char (Succ vx107) <= Char (Succ vx110))",fontsize=16,color="burlywood",shape="box"];1333[label="vx109/Succ vx1090",fontsize=10,color="white",style="solid",shape="box"];1127 -> 1333[label="",style="solid", color="burlywood", weight=9];
1333 -> 1137[label="",style="solid", color="burlywood", weight=3];
1334[label="vx109/Zero",fontsize=10,color="white",style="solid",shape="box"];1127 -> 1334[label="",style="solid", color="burlywood", weight=9];
1334 -> 1138[label="",style="solid", color="burlywood", weight=3];
1128[label="toLower1 (Char (Succ vx107)) (not (primCmpNat Zero vx109 == LT) && Char (Succ vx107) <= Char (Succ vx110))",fontsize=16,color="burlywood",shape="box"];1335[label="vx109/Succ vx1090",fontsize=10,color="white",style="solid",shape="box"];1128 -> 1335[label="",style="solid", color="burlywood", weight=9];
1335 -> 1139[label="",style="solid", color="burlywood", weight=3];
1336[label="vx109/Zero",fontsize=10,color="white",style="solid",shape="box"];1128 -> 1336[label="",style="solid", color="burlywood", weight=9];
1336 -> 1140[label="",style="solid", color="burlywood", weight=3];
829[label="primIntToChar (primPlusInt (primMinusInt (Pos (Succ vx97)) (Pos (Succ vx98))) (fromEnum (Char (Succ vx99))))",fontsize=16,color="black",shape="box"];829 -> 839[label="",style="solid", color="black", weight=3];
1129 -> 1033[label="",style="dashed", color="red", weight=0];
1129[label="toLower1 (Char (Succ vx101)) (not (primCmpNat vx1020 vx1030 == GT) || Char (Succ vx101) >= Char (Succ vx104) && Char (Succ vx101) <= Char (Succ vx105))",fontsize=16,color="magenta"];1129 -> 1141[label="",style="dashed", color="magenta", weight=3];
1129 -> 1142[label="",style="dashed", color="magenta", weight=3];
1130[label="toLower1 (Char (Succ vx101)) (not (GT == GT) || Char (Succ vx101) >= Char (Succ vx104) && Char (Succ vx101) <= Char (Succ vx105))",fontsize=16,color="black",shape="box"];1130 -> 1143[label="",style="solid", color="black", weight=3];
1131[label="toLower1 (Char (Succ vx101)) (not (LT == GT) || Char (Succ vx101) >= Char (Succ vx104) && Char (Succ vx101) <= Char (Succ vx105))",fontsize=16,color="black",shape="box"];1131 -> 1144[label="",style="solid", color="black", weight=3];
1132[label="toLower1 (Char (Succ vx101)) (not (EQ == GT) || Char (Succ vx101) >= Char (Succ vx104) && Char (Succ vx101) <= Char (Succ vx105))",fontsize=16,color="black",shape="box"];1132 -> 1145[label="",style="solid", color="black", weight=3];
1137[label="toLower1 (Char (Succ vx107)) (not (primCmpNat (Succ vx1080) (Succ vx1090) == LT) && Char (Succ vx107) <= Char (Succ vx110))",fontsize=16,color="black",shape="box"];1137 -> 1147[label="",style="solid", color="black", weight=3];
1138[label="toLower1 (Char (Succ vx107)) (not (primCmpNat (Succ vx1080) Zero == LT) && Char (Succ vx107) <= Char (Succ vx110))",fontsize=16,color="black",shape="box"];1138 -> 1148[label="",style="solid", color="black", weight=3];
1139[label="toLower1 (Char (Succ vx107)) (not (primCmpNat Zero (Succ vx1090) == LT) && Char (Succ vx107) <= Char (Succ vx110))",fontsize=16,color="black",shape="box"];1139 -> 1149[label="",style="solid", color="black", weight=3];
1140[label="toLower1 (Char (Succ vx107)) (not (primCmpNat Zero Zero == LT) && Char (Succ vx107) <= Char (Succ vx110))",fontsize=16,color="black",shape="box"];1140 -> 1150[label="",style="solid", color="black", weight=3];
839[label="primIntToChar (primPlusInt (primMinusNat (Succ vx97) (Succ vx98)) (fromEnum (Char (Succ vx99))))",fontsize=16,color="black",shape="box"];839 -> 851[label="",style="solid", color="black", weight=3];
1141[label="vx1020",fontsize=16,color="green",shape="box"];1142[label="vx1030",fontsize=16,color="green",shape="box"];1143[label="toLower1 (Char (Succ vx101)) (not True || Char (Succ vx101) >= Char (Succ vx104) && Char (Succ vx101) <= Char (Succ vx105))",fontsize=16,color="black",shape="box"];1143 -> 1151[label="",style="solid", color="black", weight=3];
1144[label="toLower1 (Char (Succ vx101)) (not False || Char (Succ vx101) >= Char (Succ vx104) && Char (Succ vx101) <= Char (Succ vx105))",fontsize=16,color="black",shape="triangle"];1144 -> 1152[label="",style="solid", color="black", weight=3];
1145 -> 1144[label="",style="dashed", color="red", weight=0];
1145[label="toLower1 (Char (Succ vx101)) (not False || Char (Succ vx101) >= Char (Succ vx104) && Char (Succ vx101) <= Char (Succ vx105))",fontsize=16,color="magenta"];1147 -> 1098[label="",style="dashed", color="red", weight=0];
1147[label="toLower1 (Char (Succ vx107)) (not (primCmpNat vx1080 vx1090 == LT) && Char (Succ vx107) <= Char (Succ vx110))",fontsize=16,color="magenta"];1147 -> 1155[label="",style="dashed", color="magenta", weight=3];
1147 -> 1156[label="",style="dashed", color="magenta", weight=3];
1148[label="toLower1 (Char (Succ vx107)) (not (GT == LT) && Char (Succ vx107) <= Char (Succ vx110))",fontsize=16,color="black",shape="box"];1148 -> 1157[label="",style="solid", color="black", weight=3];
1149[label="toLower1 (Char (Succ vx107)) (not (LT == LT) && Char (Succ vx107) <= Char (Succ vx110))",fontsize=16,color="black",shape="box"];1149 -> 1158[label="",style="solid", color="black", weight=3];
1150[label="toLower1 (Char (Succ vx107)) (not (EQ == LT) && Char (Succ vx107) <= Char (Succ vx110))",fontsize=16,color="black",shape="box"];1150 -> 1159[label="",style="solid", color="black", weight=3];
851[label="primIntToChar (primPlusInt (primMinusNat vx97 vx98) (fromEnum (Char (Succ vx99))))",fontsize=16,color="burlywood",shape="triangle"];1340[label="vx97/Succ vx970",fontsize=10,color="white",style="solid",shape="box"];851 -> 1340[label="",style="solid", color="burlywood", weight=9];
1340 -> 865[label="",style="solid", color="burlywood", weight=3];
1341[label="vx97/Zero",fontsize=10,color="white",style="solid",shape="box"];851 -> 1341[label="",style="solid", color="burlywood", weight=9];
1341 -> 866[label="",style="solid", color="burlywood", weight=3];
1151 -> 748[label="",style="dashed", color="red", weight=0];
1151[label="toLower1 (Char (Succ vx101)) (False || Char (Succ vx101) >= Char (Succ vx104) && Char (Succ vx101) <= Char (Succ vx105))",fontsize=16,color="magenta"];1151 -> 1160[label="",style="dashed", color="magenta", weight=3];
1151 -> 1161[label="",style="dashed", color="magenta", weight=3];
1151 -> 1162[label="",style="dashed", color="magenta", weight=3];
1152[label="toLower1 (Char (Succ vx101)) (True || Char (Succ vx101) >= Char (Succ vx104) && Char (Succ vx101) <= Char (Succ vx105))",fontsize=16,color="black",shape="box"];1152 -> 1163[label="",style="solid", color="black", weight=3];
1155[label="vx1090",fontsize=16,color="green",shape="box"];1156[label="vx1080",fontsize=16,color="green",shape="box"];1157[label="toLower1 (Char (Succ vx107)) (not False && Char (Succ vx107) <= Char (Succ vx110))",fontsize=16,color="black",shape="triangle"];1157 -> 1164[label="",style="solid", color="black", weight=3];
1158[label="toLower1 (Char (Succ vx107)) (not True && Char (Succ vx107) <= Char (Succ vx110))",fontsize=16,color="black",shape="box"];1158 -> 1165[label="",style="solid", color="black", weight=3];
1159 -> 1157[label="",style="dashed", color="red", weight=0];
1159[label="toLower1 (Char (Succ vx107)) (not False && Char (Succ vx107) <= Char (Succ vx110))",fontsize=16,color="magenta"];865[label="primIntToChar (primPlusInt (primMinusNat (Succ vx970) vx98) (fromEnum (Char (Succ vx99))))",fontsize=16,color="burlywood",shape="box"];1344[label="vx98/Succ vx980",fontsize=10,color="white",style="solid",shape="box"];865 -> 1344[label="",style="solid", color="burlywood", weight=9];
1344 -> 880[label="",style="solid", color="burlywood", weight=3];
1345[label="vx98/Zero",fontsize=10,color="white",style="solid",shape="box"];865 -> 1345[label="",style="solid", color="burlywood", weight=9];
1345 -> 881[label="",style="solid", color="burlywood", weight=3];
866[label="primIntToChar (primPlusInt (primMinusNat Zero vx98) (fromEnum (Char (Succ vx99))))",fontsize=16,color="burlywood",shape="box"];1346[label="vx98/Succ vx980",fontsize=10,color="white",style="solid",shape="box"];866 -> 1346[label="",style="solid", color="burlywood", weight=9];
1346 -> 882[label="",style="solid", color="burlywood", weight=3];
1347[label="vx98/Zero",fontsize=10,color="white",style="solid",shape="box"];866 -> 1347[label="",style="solid", color="burlywood", weight=9];
1347 -> 883[label="",style="solid", color="burlywood", weight=3];
1160[label="vx105",fontsize=16,color="green",shape="box"];1161[label="vx101",fontsize=16,color="green",shape="box"];1162[label="vx104",fontsize=16,color="green",shape="box"];1163 -> 743[label="",style="dashed", color="red", weight=0];
1163[label="toLower1 (Char (Succ vx101)) True",fontsize=16,color="magenta"];1163 -> 1166[label="",style="dashed", color="magenta", weight=3];
1164[label="toLower1 (Char (Succ vx107)) (True && Char (Succ vx107) <= Char (Succ vx110))",fontsize=16,color="black",shape="box"];1164 -> 1167[label="",style="solid", color="black", weight=3];
1165[label="toLower1 (Char (Succ vx107)) (False && Char (Succ vx107) <= Char (Succ vx110))",fontsize=16,color="black",shape="box"];1165 -> 1168[label="",style="solid", color="black", weight=3];
880[label="primIntToChar (primPlusInt (primMinusNat (Succ vx970) (Succ vx980)) (fromEnum (Char (Succ vx99))))",fontsize=16,color="black",shape="box"];880 -> 897[label="",style="solid", color="black", weight=3];
881[label="primIntToChar (primPlusInt (primMinusNat (Succ vx970) Zero) (fromEnum (Char (Succ vx99))))",fontsize=16,color="black",shape="box"];881 -> 898[label="",style="solid", color="black", weight=3];
882[label="primIntToChar (primPlusInt (primMinusNat Zero (Succ vx980)) (fromEnum (Char (Succ vx99))))",fontsize=16,color="black",shape="box"];882 -> 899[label="",style="solid", color="black", weight=3];
883[label="primIntToChar (primPlusInt (primMinusNat Zero Zero) (fromEnum (Char (Succ vx99))))",fontsize=16,color="black",shape="box"];883 -> 900[label="",style="solid", color="black", weight=3];
1166[label="vx101",fontsize=16,color="green",shape="box"];1167[label="toLower1 (Char (Succ vx107)) (Char (Succ vx107) <= Char (Succ vx110))",fontsize=16,color="black",shape="box"];1167 -> 1169[label="",style="solid", color="black", weight=3];
1168[label="toLower1 (Char (Succ vx107)) False",fontsize=16,color="black",shape="triangle"];1168 -> 1170[label="",style="solid", color="black", weight=3];
897 -> 851[label="",style="dashed", color="red", weight=0];
897[label="primIntToChar (primPlusInt (primMinusNat vx970 vx980) (fromEnum (Char (Succ vx99))))",fontsize=16,color="magenta"];897 -> 915[label="",style="dashed", color="magenta", weight=3];
897 -> 916[label="",style="dashed", color="magenta", weight=3];
898[label="primIntToChar (primPlusInt (Pos (Succ vx970)) (fromEnum (Char (Succ vx99))))",fontsize=16,color="black",shape="box"];898 -> 917[label="",style="solid", color="black", weight=3];
899[label="primIntToChar (primPlusInt (Neg (Succ vx980)) (fromEnum (Char (Succ vx99))))",fontsize=16,color="black",shape="box"];899 -> 918[label="",style="solid", color="black", weight=3];
900[label="primIntToChar (primPlusInt (Pos Zero) (fromEnum (Char (Succ vx99))))",fontsize=16,color="black",shape="box"];900 -> 919[label="",style="solid", color="black", weight=3];
1169[label="toLower1 (Char (Succ vx107)) (compare (Char (Succ vx107)) (Char (Succ vx110)) /= GT)",fontsize=16,color="black",shape="box"];1169 -> 1171[label="",style="solid", color="black", weight=3];
1170[label="toLower0 (Char (Succ vx107)) otherwise",fontsize=16,color="black",shape="box"];1170 -> 1172[label="",style="solid", color="black", weight=3];
915[label="vx970",fontsize=16,color="green",shape="box"];916[label="vx980",fontsize=16,color="green",shape="box"];917[label="primIntToChar (primPlusInt (Pos (Succ vx970)) (primCharToInt (Char (Succ vx99))))",fontsize=16,color="black",shape="box"];917 -> 934[label="",style="solid", color="black", weight=3];
918[label="primIntToChar (primPlusInt (Neg (Succ vx980)) (primCharToInt (Char (Succ vx99))))",fontsize=16,color="black",shape="box"];918 -> 935[label="",style="solid", color="black", weight=3];
919[label="primIntToChar (primPlusInt (Pos Zero) (primCharToInt (Char (Succ vx99))))",fontsize=16,color="black",shape="box"];919 -> 936[label="",style="solid", color="black", weight=3];
1171[label="toLower1 (Char (Succ vx107)) (not (compare (Char (Succ vx107)) (Char (Succ vx110)) == GT))",fontsize=16,color="black",shape="box"];1171 -> 1173[label="",style="solid", color="black", weight=3];
1172[label="toLower0 (Char (Succ vx107)) True",fontsize=16,color="black",shape="box"];1172 -> 1174[label="",style="solid", color="black", weight=3];
934[label="primIntToChar (primPlusInt (Pos (Succ vx970)) (Pos (Succ vx99)))",fontsize=16,color="black",shape="box"];934 -> 950[label="",style="solid", color="black", weight=3];
935[label="primIntToChar (primPlusInt (Neg (Succ vx980)) (Pos (Succ vx99)))",fontsize=16,color="black",shape="box"];935 -> 951[label="",style="solid", color="black", weight=3];
936[label="primIntToChar (primPlusInt (Pos Zero) (Pos (Succ vx99)))",fontsize=16,color="black",shape="box"];936 -> 952[label="",style="solid", color="black", weight=3];
1173[label="toLower1 (Char (Succ vx107)) (not (primCmpChar (Char (Succ vx107)) (Char (Succ vx110)) == GT))",fontsize=16,color="black",shape="box"];1173 -> 1175[label="",style="solid", color="black", weight=3];
1174[label="Char (Succ vx107)",fontsize=16,color="green",shape="box"];950[label="primIntToChar (Pos (primPlusNat (Succ vx970) (Succ vx99)))",fontsize=16,color="black",shape="box"];950 -> 967[label="",style="solid", color="black", weight=3];
951[label="primIntToChar (primMinusNat (Succ vx99) (Succ vx980))",fontsize=16,color="black",shape="box"];951 -> 968[label="",style="solid", color="black", weight=3];
952[label="primIntToChar (Pos (primPlusNat Zero (Succ vx99)))",fontsize=16,color="black",shape="box"];952 -> 969[label="",style="solid", color="black", weight=3];
1175 -> 1249[label="",style="dashed", color="red", weight=0];
1175[label="toLower1 (Char (Succ vx107)) (not (primCmpNat (Succ vx107) (Succ vx110) == GT))",fontsize=16,color="magenta"];1175 -> 1250[label="",style="dashed", color="magenta", weight=3];
1175 -> 1251[label="",style="dashed", color="magenta", weight=3];
1175 -> 1252[label="",style="dashed", color="magenta", weight=3];
967[label="Char (primPlusNat (Succ vx970) (Succ vx99))",fontsize=16,color="green",shape="box"];967 -> 986[label="",style="dashed", color="green", weight=3];
968[label="primIntToChar (primMinusNat vx99 vx980)",fontsize=16,color="burlywood",shape="triangle"];1351[label="vx99/Succ vx990",fontsize=10,color="white",style="solid",shape="box"];968 -> 1351[label="",style="solid", color="burlywood", weight=9];
1351 -> 987[label="",style="solid", color="burlywood", weight=3];
1352[label="vx99/Zero",fontsize=10,color="white",style="solid",shape="box"];968 -> 1352[label="",style="solid", color="burlywood", weight=9];
1352 -> 988[label="",style="solid", color="burlywood", weight=3];
969[label="Char (primPlusNat Zero (Succ vx99))",fontsize=16,color="green",shape="box"];969 -> 989[label="",style="dashed", color="green", weight=3];
1250[label="Succ vx107",fontsize=16,color="green",shape="box"];1251[label="Succ vx110",fontsize=16,color="green",shape="box"];1252[label="vx107",fontsize=16,color="green",shape="box"];1249[label="toLower1 (Char (Succ vx112)) (not (primCmpNat vx113 vx114 == GT))",fontsize=16,color="burlywood",shape="triangle"];1353[label="vx113/Succ vx1130",fontsize=10,color="white",style="solid",shape="box"];1249 -> 1353[label="",style="solid", color="burlywood", weight=9];
1353 -> 1271[label="",style="solid", color="burlywood", weight=3];
1354[label="vx113/Zero",fontsize=10,color="white",style="solid",shape="box"];1249 -> 1354[label="",style="solid", color="burlywood", weight=9];
1354 -> 1272[label="",style="solid", color="burlywood", weight=3];
986[label="primPlusNat (Succ vx970) (Succ vx99)",fontsize=16,color="black",shape="box"];986 -> 1005[label="",style="solid", color="black", weight=3];
987[label="primIntToChar (primMinusNat (Succ vx990) vx980)",fontsize=16,color="burlywood",shape="box"];1355[label="vx980/Succ vx9800",fontsize=10,color="white",style="solid",shape="box"];987 -> 1355[label="",style="solid", color="burlywood", weight=9];
1355 -> 1006[label="",style="solid", color="burlywood", weight=3];
1356[label="vx980/Zero",fontsize=10,color="white",style="solid",shape="box"];987 -> 1356[label="",style="solid", color="burlywood", weight=9];
1356 -> 1007[label="",style="solid", color="burlywood", weight=3];
988[label="primIntToChar (primMinusNat Zero vx980)",fontsize=16,color="burlywood",shape="box"];1357[label="vx980/Succ vx9800",fontsize=10,color="white",style="solid",shape="box"];988 -> 1357[label="",style="solid", color="burlywood", weight=9];
1357 -> 1008[label="",style="solid", color="burlywood", weight=3];
1358[label="vx980/Zero",fontsize=10,color="white",style="solid",shape="box"];988 -> 1358[label="",style="solid", color="burlywood", weight=9];
1358 -> 1009[label="",style="solid", color="burlywood", weight=3];
989[label="primPlusNat Zero (Succ vx99)",fontsize=16,color="black",shape="box"];989 -> 1010[label="",style="solid", color="black", weight=3];
1271[label="toLower1 (Char (Succ vx112)) (not (primCmpNat (Succ vx1130) vx114 == GT))",fontsize=16,color="burlywood",shape="box"];1359[label="vx114/Succ vx1140",fontsize=10,color="white",style="solid",shape="box"];1271 -> 1359[label="",style="solid", color="burlywood", weight=9];
1359 -> 1273[label="",style="solid", color="burlywood", weight=3];
1360[label="vx114/Zero",fontsize=10,color="white",style="solid",shape="box"];1271 -> 1360[label="",style="solid", color="burlywood", weight=9];
1360 -> 1274[label="",style="solid", color="burlywood", weight=3];
1272[label="toLower1 (Char (Succ vx112)) (not (primCmpNat Zero vx114 == GT))",fontsize=16,color="burlywood",shape="box"];1361[label="vx114/Succ vx1140",fontsize=10,color="white",style="solid",shape="box"];1272 -> 1361[label="",style="solid", color="burlywood", weight=9];
1361 -> 1275[label="",style="solid", color="burlywood", weight=3];
1362[label="vx114/Zero",fontsize=10,color="white",style="solid",shape="box"];1272 -> 1362[label="",style="solid", color="burlywood", weight=9];
1362 -> 1276[label="",style="solid", color="burlywood", weight=3];
1005[label="Succ (Succ (primPlusNat vx970 vx99))",fontsize=16,color="green",shape="box"];1005 -> 1028[label="",style="dashed", color="green", weight=3];
1006[label="primIntToChar (primMinusNat (Succ vx990) (Succ vx9800))",fontsize=16,color="black",shape="box"];1006 -> 1029[label="",style="solid", color="black", weight=3];
1007[label="primIntToChar (primMinusNat (Succ vx990) Zero)",fontsize=16,color="black",shape="box"];1007 -> 1030[label="",style="solid", color="black", weight=3];
1008[label="primIntToChar (primMinusNat Zero (Succ vx9800))",fontsize=16,color="black",shape="box"];1008 -> 1031[label="",style="solid", color="black", weight=3];
1009[label="primIntToChar (primMinusNat Zero Zero)",fontsize=16,color="black",shape="box"];1009 -> 1032[label="",style="solid", color="black", weight=3];
1010[label="Succ vx99",fontsize=16,color="green",shape="box"];1273[label="toLower1 (Char (Succ vx112)) (not (primCmpNat (Succ vx1130) (Succ vx1140) == GT))",fontsize=16,color="black",shape="box"];1273 -> 1277[label="",style="solid", color="black", weight=3];
1274[label="toLower1 (Char (Succ vx112)) (not (primCmpNat (Succ vx1130) Zero == GT))",fontsize=16,color="black",shape="box"];1274 -> 1278[label="",style="solid", color="black", weight=3];
1275[label="toLower1 (Char (Succ vx112)) (not (primCmpNat Zero (Succ vx1140) == GT))",fontsize=16,color="black",shape="box"];1275 -> 1279[label="",style="solid", color="black", weight=3];
1276[label="toLower1 (Char (Succ vx112)) (not (primCmpNat Zero Zero == GT))",fontsize=16,color="black",shape="box"];1276 -> 1280[label="",style="solid", color="black", weight=3];
1028[label="primPlusNat vx970 vx99",fontsize=16,color="burlywood",shape="triangle"];1363[label="vx970/Succ vx9700",fontsize=10,color="white",style="solid",shape="box"];1028 -> 1363[label="",style="solid", color="burlywood", weight=9];
1363 -> 1071[label="",style="solid", color="burlywood", weight=3];
1364[label="vx970/Zero",fontsize=10,color="white",style="solid",shape="box"];1028 -> 1364[label="",style="solid", color="burlywood", weight=9];
1364 -> 1072[label="",style="solid", color="burlywood", weight=3];
1029 -> 968[label="",style="dashed", color="red", weight=0];
1029[label="primIntToChar (primMinusNat vx990 vx9800)",fontsize=16,color="magenta"];1029 -> 1073[label="",style="dashed", color="magenta", weight=3];
1029 -> 1074[label="",style="dashed", color="magenta", weight=3];
1030[label="primIntToChar (Pos (Succ vx990))",fontsize=16,color="black",shape="box"];1030 -> 1075[label="",style="solid", color="black", weight=3];
1031[label="primIntToChar (Neg (Succ vx9800))",fontsize=16,color="black",shape="box"];1031 -> 1076[label="",style="solid", color="black", weight=3];
1032[label="primIntToChar (Pos Zero)",fontsize=16,color="black",shape="box"];1032 -> 1077[label="",style="solid", color="black", weight=3];
1277 -> 1249[label="",style="dashed", color="red", weight=0];
1277[label="toLower1 (Char (Succ vx112)) (not (primCmpNat vx1130 vx1140 == GT))",fontsize=16,color="magenta"];1277 -> 1281[label="",style="dashed", color="magenta", weight=3];
1277 -> 1282[label="",style="dashed", color="magenta", weight=3];
1278[label="toLower1 (Char (Succ vx112)) (not (GT == GT))",fontsize=16,color="black",shape="box"];1278 -> 1283[label="",style="solid", color="black", weight=3];
1279[label="toLower1 (Char (Succ vx112)) (not (LT == GT))",fontsize=16,color="black",shape="box"];1279 -> 1284[label="",style="solid", color="black", weight=3];
1280[label="toLower1 (Char (Succ vx112)) (not (EQ == GT))",fontsize=16,color="black",shape="box"];1280 -> 1285[label="",style="solid", color="black", weight=3];
1071[label="primPlusNat (Succ vx9700) vx99",fontsize=16,color="burlywood",shape="box"];1367[label="vx99/Succ vx990",fontsize=10,color="white",style="solid",shape="box"];1071 -> 1367[label="",style="solid", color="burlywood", weight=9];
1367 -> 1094[label="",style="solid", color="burlywood", weight=3];
1368[label="vx99/Zero",fontsize=10,color="white",style="solid",shape="box"];1071 -> 1368[label="",style="solid", color="burlywood", weight=9];
1368 -> 1095[label="",style="solid", color="burlywood", weight=3];
1072[label="primPlusNat Zero vx99",fontsize=16,color="burlywood",shape="box"];1369[label="vx99/Succ vx990",fontsize=10,color="white",style="solid",shape="box"];1072 -> 1369[label="",style="solid", color="burlywood", weight=9];
1369 -> 1096[label="",style="solid", color="burlywood", weight=3];
1370[label="vx99/Zero",fontsize=10,color="white",style="solid",shape="box"];1072 -> 1370[label="",style="solid", color="burlywood", weight=9];
1370 -> 1097[label="",style="solid", color="burlywood", weight=3];
1073[label="vx9800",fontsize=16,color="green",shape="box"];1074[label="vx990",fontsize=16,color="green",shape="box"];1075[label="Char (Succ vx990)",fontsize=16,color="green",shape="box"];1076[label="error []",fontsize=16,color="red",shape="box"];1077[label="Char Zero",fontsize=16,color="green",shape="box"];1281[label="vx1130",fontsize=16,color="green",shape="box"];1282[label="vx1140",fontsize=16,color="green",shape="box"];1283[label="toLower1 (Char (Succ vx112)) (not True)",fontsize=16,color="black",shape="box"];1283 -> 1286[label="",style="solid", color="black", weight=3];
1284[label="toLower1 (Char (Succ vx112)) (not False)",fontsize=16,color="black",shape="triangle"];1284 -> 1287[label="",style="solid", color="black", weight=3];
1285 -> 1284[label="",style="dashed", color="red", weight=0];
1285[label="toLower1 (Char (Succ vx112)) (not False)",fontsize=16,color="magenta"];1094[label="primPlusNat (Succ vx9700) (Succ vx990)",fontsize=16,color="black",shape="box"];1094 -> 1133[label="",style="solid", color="black", weight=3];
1095[label="primPlusNat (Succ vx9700) Zero",fontsize=16,color="black",shape="box"];1095 -> 1134[label="",style="solid", color="black", weight=3];
1096[label="primPlusNat Zero (Succ vx990)",fontsize=16,color="black",shape="box"];1096 -> 1135[label="",style="solid", color="black", weight=3];
1097[label="primPlusNat Zero Zero",fontsize=16,color="black",shape="box"];1097 -> 1136[label="",style="solid", color="black", weight=3];
1286 -> 1168[label="",style="dashed", color="red", weight=0];
1286[label="toLower1 (Char (Succ vx112)) False",fontsize=16,color="magenta"];1286 -> 1288[label="",style="dashed", color="magenta", weight=3];
1287 -> 743[label="",style="dashed", color="red", weight=0];
1287[label="toLower1 (Char (Succ vx112)) True",fontsize=16,color="magenta"];1287 -> 1289[label="",style="dashed", color="magenta", weight=3];
1133[label="Succ (Succ (primPlusNat vx9700 vx990))",fontsize=16,color="green",shape="box"];1133 -> 1146[label="",style="dashed", color="green", weight=3];
1134[label="Succ vx9700",fontsize=16,color="green",shape="box"];1135[label="Succ vx990",fontsize=16,color="green",shape="box"];1136[label="Zero",fontsize=16,color="green",shape="box"];1288[label="vx112",fontsize=16,color="green",shape="box"];1289[label="vx112",fontsize=16,color="green",shape="box"];1146 -> 1028[label="",style="dashed", color="red", weight=0];
1146[label="primPlusNat vx9700 vx990",fontsize=16,color="magenta"];1146 -> 1153[label="",style="dashed", color="magenta", weight=3];
1146 -> 1154[label="",style="dashed", color="magenta", weight=3];
1153[label="vx9700",fontsize=16,color="green",shape="box"];1154[label="vx990",fontsize=16,color="green",shape="box"];}

↳ HASKELL

  ↳ BR

    ↳ HASKELL

      ↳ COR

        ↳ HASKELL

          ↳ NumRed

            ↳ HASKELL

              ↳ Narrow

                ↳ AND

                  ↳ QDP

                    ↳ QDPSizeChangeProof

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

Q DP problem:
The TRS P consists of the following rules:

new_primIntToChar(Succ(vx990), Succ(vx9800)) → new_primIntToChar(vx990, vx9800)

R is empty.
Q is empty.
We have to consider all minimal (P,Q,R)-chains.
By using the subterm criterion [20] together with the size-change analysis [32] we have proven that there are no infinite chains for this DP problem.

From the DPs we obtained the following set of size-change graphs:

new_primIntToChar(Succ(vx990), Succ(vx9800)) → new_primIntToChar(vx990, vx9800)
The graph contains the following edges 1 > 1, 2 > 2

↳ HASKELL

  ↳ BR

    ↳ HASKELL

      ↳ COR

        ↳ HASKELL

          ↳ NumRed

            ↳ HASKELL

              ↳ Narrow

                ↳ AND

                  ↳ QDP

                  ↳ QDP

                    ↳ QDPSizeChangeProof

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

Q DP problem:
The TRS P consists of the following rules:

new_primPlusNat(Succ(vx9700), Succ(vx990)) → new_primPlusNat(vx9700, vx990)

From the DPs we obtained the following set of size-change graphs:

new_primPlusNat(Succ(vx9700), Succ(vx990)) → new_primPlusNat(vx9700, vx990)
The graph contains the following edges 1 > 1, 2 > 2

↳ HASKELL

  ↳ BR

    ↳ HASKELL

      ↳ COR

        ↳ HASKELL

          ↳ NumRed

            ↳ HASKELL

              ↳ Narrow

                ↳ AND

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

                    ↳ QDPSizeChangeProof

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

Q DP problem:
The TRS P consists of the following rules:

new_primIntToChar0(Succ(vx970), Succ(vx980), vx99) → new_primIntToChar0(vx970, vx980, vx99)

From the DPs we obtained the following set of size-change graphs:

new_primIntToChar0(Succ(vx970), Succ(vx980), vx99) → new_primIntToChar0(vx970, vx980, vx99)
The graph contains the following edges 1 > 1, 2 > 2, 3 >= 3

↳ HASKELL

  ↳ BR

    ↳ HASKELL

      ↳ COR

        ↳ HASKELL

          ↳ NumRed

            ↳ HASKELL

              ↳ Narrow

                ↳ AND

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

                    ↳ QDPSizeChangeProof

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

Q DP problem:
The TRS P consists of the following rules:

new_toLower1(vx112, Succ(vx1130), Succ(vx1140)) → new_toLower1(vx112, vx1130, vx1140)

From the DPs we obtained the following set of size-change graphs:

new_toLower1(vx112, Succ(vx1130), Succ(vx1140)) → new_toLower1(vx112, vx1130, vx1140)
The graph contains the following edges 1 >= 1, 2 > 2, 3 > 3

↳ HASKELL

  ↳ BR

    ↳ HASKELL

      ↳ COR

        ↳ HASKELL

          ↳ NumRed

            ↳ HASKELL

              ↳ Narrow

                ↳ AND

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

                    ↳ QDPSizeChangeProof

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

Q DP problem:
The TRS P consists of the following rules:

new_toLower10(vx107, Succ(vx1080), Succ(vx1090), vx110) → new_toLower10(vx107, vx1080, vx1090, vx110)

From the DPs we obtained the following set of size-change graphs:

new_toLower10(vx107, Succ(vx1080), Succ(vx1090), vx110) → new_toLower10(vx107, vx1080, vx1090, vx110)
The graph contains the following edges 1 >= 1, 2 > 2, 3 > 3, 4 >= 4

↳ HASKELL

  ↳ BR

    ↳ HASKELL

      ↳ COR

        ↳ HASKELL

          ↳ NumRed

            ↳ HASKELL

              ↳ Narrow

                ↳ AND

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

                    ↳ QDPSizeChangeProof

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

Q DP problem:
The TRS P consists of the following rules:

new_toLower11(vx101, Succ(vx1020), Succ(vx1030), vx104, vx105) → new_toLower11(vx101, vx1020, vx1030, vx104, vx105)

From the DPs we obtained the following set of size-change graphs:

new_toLower11(vx101, Succ(vx1020), Succ(vx1030), vx104, vx105) → new_toLower11(vx101, vx1020, vx1030, vx104, vx105)
The graph contains the following edges 1 >= 1, 2 > 2, 3 > 3, 4 >= 4, 5 >= 5

↳ HASKELL

  ↳ BR

    ↳ HASKELL

      ↳ COR

        ↳ HASKELL

          ↳ NumRed

            ↳ HASKELL

              ↳ Narrow

                ↳ AND

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

                    ↳ QDPSizeChangeProof

                  ↳ QDP

                  ↳ QDP

Q DP problem:
The TRS P consists of the following rules:

new_toLower12(vx80, Succ(vx810), Succ(vx820), vx83, vx84, vx85) → new_toLower12(vx80, vx810, vx820, vx83, vx84, vx85)

From the DPs we obtained the following set of size-change graphs:

new_toLower12(vx80, Succ(vx810), Succ(vx820), vx83, vx84, vx85) → new_toLower12(vx80, vx810, vx820, vx83, vx84, vx85)
The graph contains the following edges 1 >= 1, 2 > 2, 3 > 3, 4 >= 4, 5 >= 5, 6 >= 6

↳ HASKELL

  ↳ BR

    ↳ HASKELL

      ↳ COR

        ↳ HASKELL

          ↳ NumRed

            ↳ HASKELL

              ↳ Narrow

                ↳ AND

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

                    ↳ QDPSizeChangeProof

                  ↳ QDP

Q DP problem:
The TRS P consists of the following rules:

new_toLower13(vx72, Succ(vx730), Succ(vx740), vx75, vx76, vx77, vx78) → new_toLower13(vx72, vx730, vx740, vx75, vx76, vx77, vx78)

From the DPs we obtained the following set of size-change graphs:

new_toLower13(vx72, Succ(vx730), Succ(vx740), vx75, vx76, vx77, vx78) → new_toLower13(vx72, vx730, vx740, vx75, vx76, vx77, vx78)
The graph contains the following edges 1 >= 1, 2 > 2, 3 > 3, 4 >= 4, 5 >= 5, 6 >= 6, 7 >= 7

↳ HASKELL

  ↳ BR

    ↳ HASKELL

      ↳ COR

        ↳ HASKELL

          ↳ NumRed

            ↳ HASKELL

              ↳ Narrow

                ↳ AND

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

                  ↳ QDP

                    ↳ QDPSizeChangeProof

Q DP problem:
The TRS P consists of the following rules:

new_toLower14(vx38, Succ(vx390), Succ(vx400), vx41, vx42, vx43, vx44, vx45) → new_toLower14(vx38, vx390, vx400, vx41, vx42, vx43, vx44, vx45)

From the DPs we obtained the following set of size-change graphs:

new_toLower14(vx38, Succ(vx390), Succ(vx400), vx41, vx42, vx43, vx44, vx45) → new_toLower14(vx38, vx390, vx400, vx41, vx42, vx43, vx44, vx45)
The graph contains the following edges 1 >= 1, 2 > 2, 3 > 3, 4 >= 4, 5 >= 5, 6 >= 6, 7 >= 7, 8 >= 8

toLower1	c True	= toEnum (fromEnum c - fromEnum 'A' + fromEnum 'a')
toLower1	c False	= toLower0 c otherwise